home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / mint / utilit~1 / gemtrm12.zoo / vaproto.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-11-08  |  2.8 KB  |  120 lines
  1. /*********************************************************************
  2.  * GEMTERM V1.2
  3.  * 1992 by Martin F. Gergeleit
  4.  * placed in the public domain
  5.  *
  6.  * GEMTERM COMES WITH ABSOLUTELY NO WARRANTY, NOR WILL I BE LIABLE FOR ANY
  7.  * DAMAGES INCURRED FROM THE USE OF IT. USE ENTIRELY AT YOUR OWN RISK!!!
  8.  *********************************************************************/
  9.  
  10. #include <gemfast.h>
  11. #include <osbind.h>
  12. #include "vaproto.h"
  13. #include "txtwin.h"
  14.  
  15. #define MY_NAME   "GEMTERM "
  16.  
  17. extern menu_id;
  18.  
  19. char  my_name[] = MY_NAME;
  20. short my_msg[8];
  21. int   gemini_id;
  22. extern int proto_status;
  23. extern char appl_name[];
  24.  
  25. do_av_protocoll()
  26. {
  27.   gemini_id = appl_find(appl_name);
  28.   if (gemini_id >= 0){
  29.     my_msg[0] = AV_PROTOKOLL;
  30.     my_msg[1] = (short)gl_apid;
  31.     my_msg[2] = 0;
  32.     my_msg[3] = 0x0002; /* VA_START */
  33.     my_msg[4] = 0;
  34.     my_msg[5] = 0;
  35.     *(long *)(&my_msg[6]) = (long)my_name;
  36.     appl_write(gemini_id, 16, my_msg);
  37.   }
  38. }
  39.  
  40. do_av_accwindopen(win_handle)
  41. int   win_handle;
  42. {
  43.   gemini_id = appl_find(appl_name);
  44.   if ((proto_status && 0x10) && (gemini_id >= 0) && (win_handle >= 0)){
  45.     my_msg[0] = AV_ACCWINDOPEN;
  46.     my_msg[1] = (short)gl_apid;
  47.     my_msg[2] = 0;
  48.     my_msg[3] = (short)win_handle;
  49.     appl_write(gemini_id, 16, my_msg);
  50.   }
  51. }
  52.  
  53. do_av_accwindclosed(win_handle)
  54. int   win_handle;
  55. {
  56.   gemini_id = appl_find(appl_name);
  57.   if ((proto_status && 0x10) && (gemini_id >= 0) && (win_handle >= 0)){
  58.     my_msg[0] = AV_ACCWINDCLOSED;
  59.     my_msg[1] = (short)gl_apid;
  60.     my_msg[2] = 0;
  61.     my_msg[3] = (short)win_handle;
  62.     appl_write(gemini_id, 16, my_msg);
  63.   }
  64. }
  65. /* not used so far (it does not work for Gemini 1.21)
  66. do_av_askconfont()
  67. {
  68.   gemini_id = appl_find(appl_name);
  69.   if ((proto_status && 0x04) && (gemini_id >= 0)){
  70.     my_msg[0] = AV_ASKCONFONT;
  71.     my_msg[1] = (short)gl_apid;
  72.     my_msg[2] = 0;
  73.     appl_write(gemini_id, 16, my_msg);
  74.   }
  75. }
  76. */
  77. do_av_askfilefont()
  78. {
  79.   gemini_id = appl_find(appl_name);
  80.   if ((proto_status && 0x02) && (gemini_id >= 0)){
  81.     my_msg[0] = AV_ASKFILEFONT;
  82.     my_msg[1] = (short)gl_apid;
  83.     my_msg[2] = 0;
  84.     appl_write(gemini_id, 16, my_msg);
  85.   }
  86. }
  87.  
  88. do_ac_reopen()
  89. {
  90.     my_msg[0] = GEMTERM_REOPEN;
  91.     my_msg[1] = (short)gl_apid;
  92.     my_msg[2] = 0;
  93.     my_msg[4] = (short)menu_id;
  94.     appl_write(gl_apid, 16, my_msg);
  95. }
  96.  
  97. do_ac_open()
  98. {
  99.     my_msg[0] = TOS_RUN_START;
  100.     my_msg[1] = (short)gl_apid;
  101.     my_msg[2] = 0;
  102.     appl_write(gl_apid, 16, my_msg);
  103. }
  104.  
  105. do_wm_redraw(win)
  106. txt_win *win;
  107. {
  108.   if (win->status == OPEN) {
  109.     my_msg[0] = WM_REDRAW;
  110.     my_msg[1] = (short)gl_apid;
  111.     my_msg[2] = 0;
  112.     my_msg[3] = (short)win->handle;
  113.     my_msg[4] = (short)win->xwork;
  114.     my_msg[5] = (short)win->ywork;
  115.     my_msg[6] = (short)win->wwork;
  116.     my_msg[7] = (short)win->hwork;
  117.     appl_write(gl_apid, 16, my_msg);
  118.   }
  119. }
  120.